module Main where
import IO
import Char
import System.Time
import System.Locale
import System.Environment

import Sala
import Seans
import Rezerwacja
import Sprzedaz

--end import

s :: Sala
s = Sala 0 "Duza1C" 10 15

nowCal = CalendarTime 2010 January 15 12 30 0 0 Sunday 0 "" 0 False

seans :: Seans
seans = Seans 10 "Wiedzmin" nowCal

-- Rezerwacja IDRezerwacji IDseansu IDsali rzad miejsce data
rez :: Rezerwacja
rez = Rezerwacja 3 10 0 5 10 nowCal